home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / mail / mh / contrib / queuemh / queuemh-scripts / pscan < prev    next >
Encoding:
Text File  |  1992-11-08  |  1.0 KB  |  48 lines
  1. #!/bin/sh
  2. #
  3. #  Helen Wong
  4. #  July 7, 1991
  5. #
  6. #  Modified by: dyker Friday Mar 20 13:13:48 MST 1992
  7. #       cleaned-up/took-out lots of superfluous stuff
  8. #       fixed setting of folder
  9. #       fixed the ed stuff - (some machines don't deal with /)
  10. #       made it so it deals with only the first 25 lines
  11. #       consolidated mhpath commands so it's only executed once
  12. #       added recognition of last, first, and cur as valid msgs
  13. #
  14. #  Argument need to be saved since it will be shifted.  Argument might
  15. #  be needed later.
  16. #  declaration of variables 
  17.  
  18. PATH=/usr/local/mh/bin:/bin:/usr/bin
  19. form="-form /homes/troubmh/Mail/pscan.form"
  20.  
  21. #  Arguments have to be either a folder name , a msg number, or 
  22. #  nothing.
  23.  
  24. while [ "$#" -ne 0 ]
  25. do
  26.    case "$1" in 
  27.      [0-9]* | [0-9]*[-][0-9]* | first* | last* | cur* | next* | prev*) 
  28.  
  29.         msg="$msg $1" ;;
  30.  
  31.     +* ) 
  32.         folder="$1" ;;
  33.  
  34.     * ) echo "Usage: $0 +[folder] [msg]" 
  35.            exit 1 ;; 
  36.    esac 
  37.    shift 
  38.  
  39. done 
  40.  
  41. # set default folder
  42. folder="${folder-+${FOLDER-`folder -fast`}}"
  43.  
  44.  
  45. scan $folder $msg $form
  46.  
  47. #  End of pscan 
  48.